﻿<!--#include file="inc/conn.ASP"--> <%
set rs=server.createobject("adodb.recordset")
sql="select * from comics where ID="&request("id")&""
rs.open sql,conn,1,3
rs("hits")=rs("hits")+1 
rs.update 
if month(date())=month(rs("hits_m_d")) then    
rs("hits_m")=rs("hits_m")+1                   
rs.update 
else 
rs("hits_m")=1                           
rs("hits_m_d")=now()                         
rs.update 
end if 
if DatePart("ww", now())=rs("hits_w_d") then 
rs("hits_w")=rs("hits_w")+1 
rs.update 
else
rs("hits_w")=1    
rs("hits_w_d")=DatePart("ww", now()) 
rs.update 
end if   
rs.close
conn=close
set conn=nothing%>